home *** CD-ROM | disk | FTP | other *** search
/ Mesolore / Mesolore - Disc 2.iso / mac / data / tutorial.dir / 00338_Bitmap_river-1 < prev    next >
Text File  |  2001-03-05  |  2KB  |  51 lines
  1. on EnterFrame
  2.   
  3.   repeat with i = 20 to 35
  4.     set the visible of sprite (i) = 1
  5.   end repeat
  6.     set the visible of sprite 35 = 0
  7.   updatestage
  8.   preLoad 344
  9.  
  10.  
  11.  
  12. on ExitFrame
  13.   global gThisBtn
  14.   go the frame
  15.   if the mouseUp then
  16.     
  17.     repeat with i = 20 to 29
  18.       set the puppet of sprite (i) = 1
  19.     end repeat
  20.     
  21.     
  22.     if rollOver(1) then
  23.       --unrollover all btns
  24.       
  25.       set the member of sprite 20 to member 101 of castLib "Interface Buttons.cst"
  26.       set the member of sprite 21 to member 104 of castLib "Interface Buttons.cst"
  27.       set the member of sprite 22 to member 107 of castLib "Interface Buttons.cst"
  28.       set the member of sprite 23 to member 110 of castLib "Interface Buttons.cst"
  29.       set the member of sprite 25 to member 118 of castLib "Interface Buttons.cst"
  30.       set the member of sprite 26 to member 121 of castLib "Interface Buttons.cst"
  31.       set the member of sprite 27 to member 124 of castLib "Interface Buttons.cst"
  32.       set the member of sprite 28 to member 127 of castLib "Interface Buttons.cst"
  33.       set the member of sprite 29 to member 130 of castLib "Interface Buttons.cst"
  34.       set the member of sprite 35 to member 133 of castLib "Interface Buttons.cst"
  35.       -- abort
  36.     end if
  37.     if rollOver(20) then set the castnum of sprite 20 to member 100 of castLib "Interface Buttons.cst"
  38.     if rollOver(21) then set the castnum of sprite 21 to member 103 of castLib "Interface Buttons.cst"
  39.     if rollOver(22) then set the castnum of sprite 22 to member 106 of castLib "Interface Buttons.cst"
  40.     if rollOver(23) then set the castnum of sprite 23 to member 109 of castLib "Interface Buttons.cst"
  41.     if rollOver(25) then set the castnum of sprite 25 to member 117 of castLib "Interface Buttons.cst"
  42.     if rollOver(26) then set the castnum of sprite 26 to member 120 of castLib "Interface Buttons.cst"
  43.     if rollOver(27) then set the castnum of sprite 27 to member 123 of castLib "Interface Buttons.cst"
  44.     if rollOver(28) then set the castnum of sprite 28 to member 126 of castLib "Interface Buttons.cst"
  45.     if rollOver(29) then set the castnum of sprite 29 to member 129 of castLib "Interface Buttons.cst"
  46.     
  47.     if rollOver(35) then set the castnum of sprite 35 to member 132 of castLib "Interface Buttons.cst"
  48.   end if
  49.   updatestage
  50. end
  51.